home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / Pascal / Applications / NIH Image 1.62b11 / src / Glue.c < prev    next >
Text File  |  1994-12-05  |  508b  |  15 lines

  1. /* C glue code needed by PowerPC native version of NIH Image to call
  2.    68K Photoshop compatible plug-ins. CallUniversalProc can't be called
  3.    directly from Pascal because is uses a variable number of arguments.
  4.  
  5.    uppCallCodeInfo = $00003F80; { PROCEDURE (2 byte param, 4 byte param, 4 byte param, 4 byte param);
  6. */
  7.  
  8. #include <Types.h>
  9.  
  10.  
  11. void CallCode(short selector, Ptr stuff, long *data, short *result, UniversalProcPtr codePtr)
  12. {
  13.     CallUniversalProc(codePtr, 0x3F80L, selector, stuff, data, result);
  14. }
  15.